-- card: 4397 from stack: in.hc
-- bmap block id: 0
-- flags: 0000
-- background id: 2813
-- name: D3
----- HyperTalk script -----
on openCard
  lock screen
  colorizeHC "Add","PLANETS:PLUTO:UI_MAC:D03.PIC"
  unlock screen
end openCard


on closeCard
  lock screen
  colorizeHC "colorFill"   -- redraw previous screens
  unlock screen
end closeCard


on goEvent
  lock screen
  go to cd "D1"
  unlock screen
end goEvent